(compile-internal): Use point, not point-min, for set-window-point.

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 6d76fe3384aad7bceaef559bb848fca41e174bcb..de050411411f0991a1f3f9f79cb9e7958696d365 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -754,7 +754,7 @@ Returns the compilation buffer created."
              compilation-directory-stack (list default-directory))
        (set-window-start outwin (point-min))
        (or (eq outwin (selected-window))
-           (set-window-point outwin (point-min)))
+           (set-window-point outwin (point)))
        ;; The setup function is called before compilation-set-window-height
        ;; so it can set the compilation-window-height buffer locally.
        (if compilation-process-setup-function